unit uTipo;

interface

type

  TPessoa = record
    Id: Integer;
    Nome: String;
    NomeUsual: String;
    CNPJ_CPF: String;
  end;

  TUsuario = record
    Id: Integer;
  end;

  TLocalidade = record
    Id: Integer;
    Nome: String;
    UF: String;
  end;

  TProduto = record
    Id: Integer;
    Codigo: String;
    Descricao: String;
  end;

  TIndustriaMarca = record
    Id: Integer;
    Descricao: String;
  end;

  TPedido = record
    Id: Integer;
  end;

  TEmpresa = record
    Id: Integer;
    RazaoSocial: String;
    NomeFantasia: String;
    CNPJ: String;
    IE: String;
    Email: String;
  end;

  TProdutoReferencia = record
    Id: Integer;
    Referencia: Integer;
    Descricao: String;
    Estoque: Integer;
    Custo: Currency;
    Venda: Currency;
  end;

implementation

end.
